/*
	Codes for group-comparisons results in figure4.
	Please set the working directory to the folder where the data files
	are located.
*/


//Study 1 Figure4 

log using 4_study1.log, replace

	//Calculate correct response rates (percent values when "correct"=1) for each task
	insheet using study1_all_tasks.csv, clear
	tabulate correct if task=="student"
	tabulate correct if task=="voice"
	tabulate correct if task=="ideology"

	//Chi-Suqared Tests of correct response rates between the voice task and the student document task
	insheet using study1_voice_student.csv, clear
	tabulate task correct, chi2

	//Chi-Suqared Tests of correct response rates between the voice task and the ideology task
	insheet using study1_voice_ideology.csv, clear
	tabulate task correct, chi2

log close

     
		 

 

        
